package com.by.common.redis;

import jakarta.annotation.Resource;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.data.redis.connection.DataType;
import org.springframework.data.redis.connection.ReturnType;
import org.springframework.data.redis.core.RedisCallback;
import org.springframework.data.redis.core.RedisTemplate;
import org.springframework.data.redis.core.script.DefaultRedisScript;
import org.springframework.stereotype.Component;

import java.nio.charset.StandardCharsets;
import java.util.*;
import java.util.concurrent.TimeUnit;
import java.util.function.Consumer;
import java.util.function.Function;

/**
 * Redis 工具类，封装常用的 Redis 操作
 */
@Component
public class RedisUtils {
    private static final Logger logger = LoggerFactory.getLogger(RedisUtils.class);

    @Resource
    private RedisTemplate<String, Object> redisTemplate;

    // =============================common============================

    /**
     * 指定缓存失效时间
     *
     * @param key  键
     * @param time 时间(秒)
     * @return true=设置成功；false=设置失败
     */
    public boolean expire(String key, long time) {
        return executeWithResult(ops -> {
            if (time > 0) {
                return ops.expire(key, time, TimeUnit.SECONDS);
            }
            return false;
        });
    }

    /**
     * 根据 key 获取过期时间
     *
     * @param key 键 不能为 null
     * @return 时间(秒) 返回0代表为永久有效
     */
    public Long getExpire(String key) {
        return executeWithResult(ops -> ops.getExpire(key, TimeUnit.SECONDS));
    }

    /**
     * 判断 key 是否存在
     *
     * @param key 键
     * @return true=存在；false=不存在
     */
    public Boolean hasKey(String key) {
        return executeWithResult(ops -> ops.hasKey(key));
    }

    /**
     * 删除缓存
     *
     * @param key 可以传一个值 或多个
     */
    public void del(String... key) {
        if (key != null && key.length > 0) {
            if (key.length == 1) {
                executeWithoutResult(ops -> ops.delete(key[0]));
            } else {
                executeWithoutResult(ops -> ops.delete(Arrays.asList(key)));
            }
        }
    }

    // ============================String=============================

    /**
     * 普通缓存获取
     *
     * @param key 键
     * @return 值
     */
    public Object get(String key) {
        return key == null ? null : executeWithResult(ops -> ops.opsForValue().get(key));
    }

    /**
     * 普通缓存放入
     *
     * @param key   键
     * @param value 值
     * @return true=成功；false=失败
     */
    public Boolean set(String key, Object value) {
        return executeWithResult(ops -> {
            ops.opsForValue().set(key, value);
            return true;
        });
    }

    /**
     * 普通缓存放入并设置时间
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒) time要大于0 如果time小于等于0 将设置无限期
     * @return true=成功；false=失败
     */
    public Boolean set(String key, Object value, long time) {
        return executeWithResult(ops -> {
            if (time > 0) {
                ops.opsForValue().set(key, value, time, TimeUnit.SECONDS);
            } else {
                ops.opsForValue().set(key, value);
            }
            return true;
        });
    }

    /**
     * 递增
     *
     * @param key   键
     * @param delta 要增加几(大于0)
     * @return 自增后的值
     */
    public Long incr(String key, long delta) {
        if (delta < 0) {
            throw new RuntimeException("递增因子必须大于0");
        }
        return executeWithResult(ops -> ops.opsForValue().increment(key, delta));
    }

    /**
     * 递减
     *
     * @param key   键
     * @param delta 要减少几(小于0)
     * @return 自减后的值
     */
    public Long decr(String key, long delta) {
        if (delta < 0) {
            throw new RuntimeException("递减因子必须大于0");
        }
        return executeWithResult(ops -> ops.opsForValue().increment(key, -delta));
    }

    // ================================Hash=================================

    /**
     * HashGet
     *
     * @param key  键 不能为null
     * @param item 项 不能为null
     * @return 值
     */
    public Object hget(String key, String item) {
        return executeWithResult(ops -> ops.opsForHash().get(key, item));
    }

    /**
     * 获取hashKey对应的所有键值
     *
     * @param key 键
     * @return 对应的多个键值
     */
    public Map<Object, Object> hmget(String key) {
        return executeWithResult(ops -> ops.opsForHash().entries(key));
    }

    /**
     * HashSet
     *
     * @param key 键
     * @param map 对应多个键值
     * @return true 成功 false 失败
     */
    public Boolean hmset(String key, Map<String, Object> map) {
        return executeWithResult(ops -> {
            ops.opsForHash().putAll(key, map);
            return true;
        });
    }

    /**
     * HashSet 并设置时间
     *
     * @param key  键
     * @param map  对应多个键值
     * @param time 时间(秒)
     * @return true成功 false失败
     */
    public Boolean hmset(String key, Map<String, Object> map, long time) {
        return executeWithResult(ops -> {
            ops.opsForHash().putAll(key, map);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        });
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key   键
     * @param item  项
     * @param value 值
     * @return true 成功 false失败
     */
    public Boolean hset(String key, String item, Object value) {
        return executeWithResult(ops -> {
            ops.opsForHash().put(key, item, value);
            return true;
        });
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key   键
     * @param item  项
     * @param value 值
     * @param time  时间(秒) 注意:如果已存在的hash表有时间,这里将会替换原有的时间
     * @return true 成功 false失败
     */
    public Boolean hset(String key, String item, Object value, long time) {
        return executeWithResult(ops -> {
            ops.opsForHash().put(key, item, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        });
    }

    /**
     * 删除hash表中的值
     *
     * @param key  键 不能为null
     * @param item 项 可以使多个 不能为null
     */
    public void hdel(String key, Object... item) {
        executeWithoutResult(ops -> ops.opsForHash().delete(key, item));
    }

    /**
     * 判断hash表中是否有该项的值
     *
     * @param key  键 不能为null
     * @param item 项 不能为null
     * @return true 存在 false不存在
     */
    public Boolean hHasKey(String key, String item) {
        return executeWithResult(ops -> ops.opsForHash().hasKey(key, item));
    }

    /**
     * hash递增 如果不存在,就会创建一个 并把新增后的值返回
     *
     * @param key  键
     * @param item 项
     * @param by   要增加几(大于0)
     * @return 增加后的值
     */
    public Double hincr(String key, String item, double by) {
        return executeWithResult(ops -> ops.opsForHash().increment(key, item, by));
    }

    /**
     * hash递减
     *
     * @param key  键
     * @param item 项
     * @param by   要减少记(小于0)
     * @return 减少后的值
     */
    public Double hdecr(String key, String item, double by) {
        return executeWithResult(ops -> ops.opsForHash().increment(key, item, -by));
    }

    // ============================List=============================

    /**
     * 获取list缓存的内容
     *
     * @param key   键
     * @param start 开始
     * @param end   结束 0 到 -1代表所有值
     * @return list内容
     */
    public List<Object> lRange(String key, long start, long end) {
        return executeWithResult(ops -> ops.opsForList().range(key, start, end));
    }

    /**
     * 获取list缓存的长度
     *
     * @param key 键
     * @return 长度
     */
    public Long lSize(String key) {
        return executeWithResult(ops -> ops.opsForList().size(key));
    }

    /**
     * 通过索引 获取list中的值
     *
     * @param key   键
     * @param index 索引 index>=0时， 0 表头，1 第二个元素，依次类推；index<0时，-1，表尾，-2倒数第二个元素，依次类推
     * @return 值
     */
    public Object lIndex(String key, long index) {
        return executeWithResult(ops -> ops.opsForList().index(key, index));
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @return true=成功；false=失败
     */
    public Boolean lLeftPush(String key, Object value) {
        return executeWithResult(ops -> {
            ops.opsForList().leftPush(key, value);
            return true;
        });
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     * @return true=成功；false=失败
     */
    public Boolean lLeftPush(String key, Object value, long time) {
        return executeWithResult(ops -> {
            ops.opsForList().leftPush(key, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        });
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @return true=成功；false=失败
     */
    public Boolean lRightPush(String key, Object value) {
        return executeWithResult(ops -> {
            ops.opsForList().rightPush(key, value);
            return true;
        });
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     * @return true=成功；false=失败
     */
    public Boolean lRightPush(String key, Object value, long time) {
        return executeWithResult(ops -> {
            ops.opsForList().rightPush(key, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        });
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @return true=成功；false=失败
     */
    public Boolean lLeftPushAll(String key, List<Object> value) {
        return executeWithResult(ops -> {
            ops.opsForList().leftPushAll(key, value);
            return true;
        });
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     * @return true=成功；false=失败
     */
    public Boolean lLeftPushAll(String key, List<Object> value, long time) {
        return executeWithResult(ops -> {
            ops.opsForList().leftPushAll(key, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        });
    }

    /**
     * 根据索引修改list中的某条数据
     *
     * @param key   键
     * @param index 索引
     * @param value 值
     * @return true=成功；false=失败
     */
    public Boolean lSet(String key, long index, Object value) {
        return executeWithResult(ops -> {
            ops.opsForList().set(key, index, value);
            return true;
        });
    }

    /**
     * 移除N个值为value
     *
     * @param key   键
     * @param count 移除多少个
     * @param value 值
     * @return 移除的个数
     */
    public Long lRemove(String key, long count, Object value) {
        return executeWithResult(ops -> ops.opsForList().remove(key, count, value));
    }

    // ===============================Set=================================

    /**
     * 根据key获取Set中的所有值
     *
     * @param key 键
     * @return 值集合
     */
    public Set<Object> sMembers(String key) {
        return executeWithResult(ops -> ops.opsForSet().members(key));
    }

    /**
     * 根据value从一个set中查询,是否存在
     *
     * @param key   键
     * @param value 值
     * @return true 存在 false不存在
     */
    public Boolean sIsMember(String key, Object value) {
        return executeWithResult(ops -> ops.opsForSet().isMember(key, value));
    }

    /**
     * 将数据放入set缓存
     *
     * @param key    键
     * @param values 值 可以是多个
     * @return 成功个数
     */
    public Long sAdd(String key, Object... values) {
        return executeWithResult(ops -> ops.opsForSet().add(key, values));
    }

    /**
     * 将set数据放入缓存
     *
     * @param key    键
     * @param time   时间(秒)
     * @param values 值 可以是多个
     * @return 成功个数
     */
    public Long sAdd(String key, long time, Object... values) {
        return executeWithResult(ops -> {
            Long count = ops.opsForSet().add(key, values);
            if (time > 0) {
                expire(key, time);
            }
            return count;
        });
    }

    /**
     * 获取set缓存的长度
     *
     * @param key 键
     * @return 长度
     */
    public Long sSize(String key) {
        return executeWithResult(ops -> ops.opsForSet().size(key));
    }

    /**
     * 移除值为value的
     *
     * @param key    键
     * @param values 值 可以是多个
     * @return 移除的个数
     */
    public Long sRemove(String key, Object... values) {
        return executeWithResult(ops -> ops.opsForSet().remove(key, values));
    }

    // ===============================ZSet=================================

    /**
     * 添加元素,有序集合是按照元素的score值由小到大排列
     *
     * @param key   键
     * @param value 值
     * @param score 分数
     * @return 成功个数
     */
    public Boolean zAdd(String key, Object value, double score) {
        return executeWithResult(ops -> ops.opsForZSet().add(key, value, score));
    }

    /**
     * 获取元素的分数
     *
     * @param key   键
     * @param value 值
     * @return 分数
     */
    public Double zScore(String key, Object value) {
        return executeWithResult(ops -> ops.opsForZSet().score(key, value));
    }

    /**
     * 获取元素的排名，从小到大排序
     *
     * @param key   键
     * @param value 值
     * @return 排名
     */
    public Long zRank(String key, Object value) {
        return executeWithResult(ops -> ops.opsForZSet().rank(key, value));
    }

    /**
     * 获取元素的排名，从大到小排序
     *
     * @param key   键
     * @param value 值
     * @return 排名
     */
    public Long zReverseRank(String key, Object value) {
        return executeWithResult(ops -> ops.opsForZSet().reverseRank(key, value));
    }

    /**
     * 获取集合的元素, 从小到大排序
     *
     * @param key   键
     * @param start 开始位置
     * @param end   结束位置, -1查询所有
     * @return 元素集合
     */
    public Set<Object> zRange(String key, long start, long end) {
        return executeWithResult(ops -> ops.opsForZSet().range(key, start, end));
    }

    /**
     * 获取集合元素, 从大到小排序
     *
     * @param key   键
     * @param start 开始位置
     * @param end   结束位置, -1查询所有
     * @return 元素集合
     */
    public Set<Object> zReverseRange(String key, long start, long end) {
        return executeWithResult(ops -> ops.opsForZSet().reverseRange(key, start, end));
    }

    /**
     * 获取集合中score在给定区间的元素
     *
     * @param key 键
     * @param min 最小score
     * @param max 最大score
     * @return 元素集合
     */
    public Set<Object> zRangeByScore(String key, double min, double max) {
        return executeWithResult(ops -> ops.opsForZSet().rangeByScore(key, min, max));
    }

    /**
     * 获取 ZSet 的元素数量
     *
     * @param key 键
     * @return 元素数量
     */
    public Long zSize(String key) {
        return executeWithResult(ops -> ops.opsForZSet().size(key));
    }

    /**
     * 移除 ZSet 中的元素
     *
     * @param key    键
     * @param values 值（可以多个）
     * @return 移除的元素数量
     */
    public Long zRemove(String key, Object... values) {
        return executeWithResult(ops -> ops.opsForZSet().remove(key, values));
    }

    // ===============================分布式锁=================================

    /**
     * 尝试获取分布式锁
     *
     * @param lockKey    锁
     * @param requestId  请求标识
     * @param expireTime 超期时间(秒)
     * @return true=获取成功；false=获取失败
     */
    public Boolean tryLock(String lockKey, String requestId, long expireTime) {
        return executeWithResult(ops -> ops.opsForValue().setIfAbsent(lockKey, requestId, expireTime, TimeUnit.SECONDS));
    }

    /**
     * 释放分布式锁
     *
     * @param lockKey   锁
     * @param requestId 请求标识
     * @return true=释放成功；false=释放失败
     */
    public Boolean releaseLock(String lockKey, String requestId) {
        return executeWithResult(ops -> {
            // 使用 Lua 脚本保证原子性
            String script = "if redis.call('get', KEYS[1]) == ARGV[1] then return redis.call('del', KEYS[1]) else return 0 end";
            DefaultRedisScript<Long> redisScript = new DefaultRedisScript<>();
            redisScript.setScriptText(script);
            redisScript.setResultType(Long.class);
            Object result = ops.execute(redisScript, Collections.singletonList(lockKey), requestId);
            return result != null && (Long) result == 1L;
        });
    }

    // ===============================辅助方法=================================

    /**
     * 执行 Redis 操作，处理异常并记录日志（有返回值）
     */
    private <T> T executeWithResult(Function<RedisTemplate<String, Object>, T> action) {
        try {
            return action.apply(redisTemplate);
        } catch (Exception e) {
            logger.error("Redis operation failed", e);
            throw new RuntimeException("Redis operation failed", e);
        }
    }

    /**
     * 执行无返回值的 Redis 操作，处理异常并记录日志
     */
    private void executeWithoutResult(Consumer<RedisTemplate<String, Object>> action) {
        try {
            action.accept(redisTemplate);
        } catch (Exception e) {
            logger.error("Redis operation failed", e);
            throw new RuntimeException("Redis operation failed", e);
        }
    }

    /**
     * 获取 key 的类型
     *
     * @param key 键
     * @return 类型枚举
     */
    public DataType type(String key) {
        return executeWithResult(ops -> ops.type(key));
    }
}
